
If ProcessExists("Rogue Tools.exe") Then
	$f = 0
Else
	MsgBox(4096, "Rogue Tools?", "You need to be running Rogue Tools in order to use this control")
	Exit
EndIf

$XCraft = GUICreate("XCraft", 264, 200, 0, -1, -1, $WS_EX_TOPMOST + $WS_EX_TOOLWINDOW)
Opt("GUICoordMode", 1)

$Label_1 = GUICtrlCreateLabel("Select a Recipe", 10, 10, 80, 20)
$Label_2 = GUICtrlCreateLabel("Number of times", 10, 150, 80, 20)
Global $Paused
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Combo Lists
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$combo1 = GUICtrlCreateCombo("Cooking", 10, 30, 120, 100)
GUICtrlSetData($combo1, "0-3 Carrot Broth|3-10 Orange Juice|10-14 Slice of Bluetail|14-20 Apple Juice|14-20 Selbina Butter|20-26 Meat Jerky|26-29 Insect Paste|26-29 Dhalmel Steak|26-30 Pineapple Juice|30-35 Meatball|35-38 Meat Mithkabob|35-38 Jack - o - Lantern|38-40 Melon Juice|40-42 Pie Dough|42-48 Apple Pie|48-50 Grape Juice|50-54 Carp Sushi|54-60 Yagudo Drink|60-62 Melon Pie|62-68 Colored Egg|68-70 Squid Sushi|68-70 San d'Orian Tea|70-72 Pear au Lait|72-77 Navarin|72-77 Tuna Sushi|77-81 Pamama au Lait|81-84 Sole Sushi|81-85 Pumpkin Pie|85-90 Rolanberry Pie", "Cooking")
$combo2 = GUICtrlCreateCombo("Woodworking", 10, 60, 120, 100)
GUICtrlSetData($combo2, "0-3 Arrowwood lumber|3-8 Ash lumber|8-12 Holly lumber|12-16 Bolts|16-21 Maple Sugar|21-27 Iron arrows|27-30 Silver Arrows|30-35 Oak Lumber|35-39 Beetle Arrows|39-42 Fang Arrows|42-45 Rosewood Lumber|45-49 Horn Arrows|49-52 Mahogany Lumber|52-59 Scorpion Arrows|59-62 Darksteel bolts|62-68 Bodkin Arrows|68-72 R. Hume Fishing Rod|72-74 Hume Fishing rod|74-77 Clothespole|77-83 Mithran Fishing Rod", "Woodworking")
$combo3 = GUICtrlCreateCombo("Goldsmith", 10, 90, 120, 100)
GUICtrlSetData($combo3, "0-3 Copper Ingot|3-7 Copper Hairpin|7-11 Brass Sheet|11-15 Brass Ring|15-17 Brass Hairpins|15-18 Silver Ingot|15-19 Brass Chain|19-27 Silver Hairpin|19-27 Silver Arrowheads|27-31 Hiraishin|31-35 Jeweled Silver Rings|35-38 Mythril Ingot|38-41 Mythril Sheet|41-47 Mythril Ring|47-51 Gold Ingots|51-55 Jeweled Mythril Rings|55-60 Gold Ring|60-61 Platinum Ingot|61-67 Hydro Patas|67-70 Platinum Rings|70-75 Jeweled Gold Rings", "Goldsmith")
$combo4 = GUICtrlCreateCombo("Leathercraft", 10, 120, 120, 100)
GUICtrlSetData($combo4, "0-2 Sheep leather|0-4 Sheep Wool|4-11 Solea|11-14 Lizard Mantle|14-21 Dhalmel Leather|21-27 Dhalmel Mantle|27-29 Sandals|29-31 Parchment|31-35 Ram Leather|35-43 Waistbelt|43-49 Ram Mantles|49-52 Himantes|52-59 Moccasins|59-61 Tiger Leather", "Leathercraft")
$combo5 = GUICtrlCreateCombo("Bonecraft", 140, 30, 120, 100)
GUICtrlSetData($combo5, "1-4 Bone Hairpins|4-9 Bone Arrowheads|9-17 Bone Ring|17-25 Beetle Ring|22-28 Gelatin|25-29 Horn Hairpin|29-33 Beetle Arrowheads|33-37 Horn Ring|37-43 Horn Arrowheads|43-45 Carapace Mask|45-53 Scorpion Arrowheads|53-60 Scorpion Ring|60-66 Crumhorn|66-70 Demon's Ring|70-77 Coral Visor|77-80 Coral Ring|80-84 Behemoth KnIfe", "Bonecraft")
$combo6 = GUICtrlCreateCombo("Smithing", 140, 60, 120, 100)
GUICtrlSetData($combo6, "0-4 Bronze Sheet|4-9 Bronze Scales|9-14 Bronze Bolt Heads|14-16 Crossbow Bolt|17-20 Iron Arrowheads|20-22 Iron Sheet|22-25 Baselard|25-30 Tathlum|30-33 War Pick|26-34 Padded Cap|34-36 Steel Sheet|36-40 Steel Scales|40-44 Mythril Bolt Heads|40-44 Juji Shuriken|44-46 Hibari|45-53 Darksteel KnIfe|52-55 Darksteel Sheet|55-62 Darksteel Bolt Heads|58-66 Nodowa|66-73 Darksteel Pick|73-79 Karimata Arrowheads|79-83 Darksteel Nodowa|83-87 Dark Adaman Sheet|87-92 Molybdenum Sheet", "Smithing")
$combo7 = GUICtrlCreateCombo("Alchemy", 140, 90, 120, 100)
GUICtrlSetData($combo7, "0-3 Antidote|3-8 Silencing Potion|5-10 Deodorizer|10-16 Mercury|14-20 Echo Drops|20-25 R. Glass Fiber Rod|25-28 Blinding Potion|28-30 Eye Drops|28-31 Minnow|28-34 ArtIficial Lens|34-40 Potion|40-43 Vitriol|43-51 Holy Water|45-49 R. Carbon Fiber Rod|51-56 Cermet Chunk|53-61 Glass Fibers|61-65 R. Single-Hook Fishing Rod|65-71 Paralysis Dust|71-78 Paralyze Potion|78-85 R. Composite Fishing Rod", "Alchemy")
$combo8 = GUICtrlCreateCombo("Clothcraft", 140, 120, 120, 100)
GUICtrlSetData($combo8, "0-1 Grass Thread|1-4 Grass Cloth|4-11 Cotton Thread|11-12 Cotton Cloth|12-19 Linen Thread|19-22 Linen Cloth|22-30 Fly Lure|30-35 Wool Thread|35-37 Wool Cloth|35-42 Bird Fletchings|42-45 Velvet Cloth|45-52 Insect Fletchings|52-53 Silk Cloth|53-62 Green Ribbons|62-69 Silk Headbands|69-78 Rainbow Thread|78-81 Rainbow Cloth", "Clothcraft")
$combo9 = GUICtrlCreateCombo("Times", 10, 170, 80, 100)
GUICtrlSetData($combo9, "2 Times|3 Times|4 Times|5 Times|6 Times|7 Times|8 Times|9 Times|10 Times|11 Times", "Times")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; OK BUTTON
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$button_1 = GUICtrlCreateButton("START", 100, 170, 75, 25)
GUICtrlSetState($button_1, $GUI_FOCUS)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; EXIT BUTTON
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$n2 = GUICtrlCreateButton("EXIT", 180, 170, 75, 25)
GUISetState()
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Values
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Do
	$msg = GUIGetMsg()
	If $msg = $button_1 Then

		$cook = GUICtrlRead($combo1)
		$wood = GUICtrlRead($combo2)
		$gold = GUICtrlRead($combo3)
		$leather = GUICtrlRead($combo4)
		$bone = GUICtrlRead($combo5)
		$smith = GUICtrlRead($combo6)
		$alch = GUICtrlRead($combo7)
		$cloth = GUICtrlRead($combo8)
		$times = GUICtrlRead($combo9)

		If $cook = "Cooking" Then $cook2 = 0
		If $cook = "0-3 Carrot Broth" Then $cook2 = 4000
		If $cook = "3-10 Orange Juice" Then $cook2 = 4000
		If $cook = "10-14 Slice of Bluetail" Then $cook2 = 100
		If $cook = "14-20 Apple Juice" Then $cook2 = 4000
		If $cook = "14-20 Selbina Butter" Then $cook2 = 200
		If $cook = "20-26 Meat Jerky" Then $cook2 = 300
		If $cook = "26-29 Insect Paste" Then $cook2 = 300
		If $cook = "26-29 Dhalmel Steak" Then $cook2 = 300
		If $cook = "26-30 Pineapple Juice" Then $cook2 = 2000
		If $cook = "30-35 Meatball" Then $cook2 = 301
		If $cook = "35-38 Meat Mithkabob" Then $cook2 = 400
		If $cook = "35-38 Jack - o - Lantern" Then $cook2 = 200
		If $cook = "38-40 Melon Juice" Then $cook2 = 200
		If $cook = "40-42 Pie Dough" Then $cook2 = 301
		If $cook = "42-48 Apple Pie" Then $cook2 = 500
		If $cook = "48-50 Grape Juice" Then $cook2 = 4000
		If $cook = "50-54 Carp Sushi" Then $cook2 = 300
		If $cook = "54-60 Yagudo Drink" Then $cook2 = 4030
		If $cook = "60-62 Melon Pie" Then $cook2 = 500
		If $cook = "62-68 Colored Egg" Then $cook2 = 400
		If $cook = "68-70 Squid Sushi" Then $cook2 = 501
		If $cook = "68-70 San d'Orian Tea" Then $cook2 = 500
		If $cook = "70-72 Pear au Lait" Then $cook2 = 4020
		If $cook = "72-77 Navarin" Then $cook2 = 800
		If $cook = "72-77 Tuna Sushi" Then $cook2 = 501
		If $cook = "77-81 Pamama au Lait" Then $cook2 = 4020
		If $cook = "81-84 Sole Sushi" Then $cook2 = 500
		If $cook = "81-85 Pumpkin Pie" Then $cook2 = 800
		If $cook = "85-90 Rolanberry Pie" Then $cook2 = 701
		;Woodworking
		If $wood = "Woodworking" Then $wood2 = 0
		If $wood = "0-3 Arrowwood lumber" Then $wood2 = 101
		If $wood = "3-8 Ash lumber" Then $wood2 = 101
		If $wood = "8-12 Holly lumber" Then $wood2 = 101
		If $wood = "12-16 Bolts" Then $wood2 = 200
		If $wood = "16-21 Maple Sugar" Then $wood2 = 101
		If $wood = "21-27 Iron arrows" Then $wood2 = 300
		If $wood = "27-30 Silver Arrows" Then $wood2 = 300
		If $wood = "30-35 Oak Lumber" Then $wood2 = 101
		If $wood = "35-39 Beetle Arrows" Then $wood2 = 300
		If $wood = "39-42 Fang Arrows" Then $wood2 = 300
		If $wood = "42-45 Rosewood Lumber" Then $wood2 = 101
		If $wood = "45-49 Horn Arrows" Then $wood2 = 300
		If $wood = "49-52 Mahogany Lumber" Then $wood2 = 101
		If $wood = "52-59 Scorpion Arrows" Then $wood2 = 300
		If $wood = "59-62 Darksteel bolts" Then $wood2 = 200
		If $wood = "62-68 Bodkin Arrows" Then $wood2 = 300
		If $wood = "68-72 R. Hume Fishing Rod" Then $wood2 = 101
		If $wood = "72-74 Hume Fishing rod" Then $wood2 = 200
		If $wood = "74-77 Clothespole" Then $wood2 = 200
		If $wood = "77-83 Mithran Fishing Rod" Then $wood2 = 200
		;Gold Smithing
		If $gold = "Goldsmith" Then $gold2 = 0
		If $gold = "0-3 Copper Ingot" Then $gold2 = 4040
		If $gold = "3-7 Copper Hairpin" Then $gold2 = 100
		If $gold = "7-11 Brass Sheet" Then $gold2 = 100
		If $gold = "11-15 Brass Ring" Then $gold2 = 2000
		If $gold = "15-17 Brass Hairpins" Then $gold2 = 100
		If $gold = "15-18 Silver Ingot" Then $gold2 = 4000
		If $gold = "15-19 Brass Chain" Then $gold2 = 2000
		If $gold = "19-27 Silver Hairpin" Then $gold2 = 100
		If $gold = "19-27 Silver Arrowheads" Then $gold2 = 200
		If $gold = "27-31 Hiraishin" Then $gold2 = 200
		If $gold = "31-35 Jeweled Silver Rings" Then $gold2 = 201
		If $gold = "35-38 Mythril Ingot" Then $gold2 = 4000
		If $gold = "38-41 Mythril Sheet" Then $gold2 = 100
		If $gold = "41-47 Mythril Ring" Then $gold2 = 2000
		If $gold = "47-51 Gold Ingots" Then $gold2 = 4000
		If $gold = "51-55 Jeweled Mythril Rings" Then $gold2 = 201
		If $gold = "55-60 Gold Ring" Then $gold2 = 2000
		If $gold = "60-61 Platinum Ingot" Then $gold2 = 4000
		If $gold = "61-67 Hydro Patas" Then $gold2 = 301
		If $gold = "67-70 Platinum Rings" Then $gold2 = 2000
		If $gold = "70-75 Jeweled Gold Rings" Then $gold2 = 201
		;Bonecraft
		If $bone = "Bonecraft" Then $bone2 = 0
		If $bone = "1-4 Bone Hairpins" Then $bone2 = 100
		If $bone = "4-9 Bone Arrowheads" Then $bone2 = 2000
		If $bone = "9-17 Bone Ring" Then $bone2 = 200
		If $bone = "17-25 Beetle Ring" Then $bone2 = 100
		If $bone = "22-28 Gelatin" Then $bone2 = 201
		If $bone = "25-29 Horn Hairpin" Then $bone2 = 101
		If $bone = "29-33 Beetle Arrowheads" Then $bone2 = 200
		If $bone = "33-37 Horn Ring" Then $bone2 = 201
		If $bone = "37-43 Horn Arrowheads" Then $bone2 = 201
		If $bone = "43-45 Carapace Mask" Then $bone2 = 201
		If $bone = "45-53 Scorpion Arrowheads" Then $bone2 = 201
		If $bone = "53-60 Scorpion Ring" Then $bone2 = 101
		If $bone = "60-66 Crumhorn" Then $bone2 = 200
		If $bone = "66-70 Demon's Ring" Then $bone2 = 200
		If $bone = "70-77 Coral Visor" Then $bone2 = 3020
		If $bone = "77-80 Coral Ring" Then $bone2 = 2000
		If $bone = "80-84 Behemoth KnCasee" Then $bone2 = 201
		;Smithing
		If $smith = "Smithing" Then $smith2 = 0
		If $smith = "0-4 Bronze Sheet" Then $smith2 = 100
		If $smith = "4-9 Bronze Scales" Then $smith2 = 100
		If $smith = "9-14 Bronze Bolt Heads" Then $smith2 = 100
		If $smith = "14-16 Crossbow Bolt" Then $smith2 = 200
		If $smith = "17-20 Iron Arrowheads" Then $smith2 = 200
		If $smith = "20-22 Iron Sheet" Then $smith2 = 100
		If $smith = "22-25 Baselard" Then $smith2 = 200
		If $smith = "25-30 Tathlum" Then $smith2 = 100
		If $smith = "30-33 War Pick" Then $smith2 = 101
		If $smith = "26-34 Padded Cap" Then $smith2 = 101
		If $smith = "34-36 Steel Sheet" Then $smith2 = 100
		If $smith = "36-40 Steel Scales" Then $smith2 = 100
		If $smith = "40-44 Mythril Bolt Heads" Then $smith2 = 100
		If $smith = "40-44 Juji Shuriken" Then $smith2 = 200
		If $smith = "44-46 Hibari" Then $smith2 = 200
		If $smith = "45-53 Darksteel KnCasee" Then $smith2 = 200
		If $smith = "52-55 Darksteel Sheet" Then $smith2 = 100
		If $smith = "55-62 Darksteel Bolt Heads" Then $smith2 = 100
		If $smith = "58-66 Nodowa" Then $smith2 = 200
		If $smith = "66-73 Darksteel Pick" Then $smith2 = 200
		If $smith = "73-79 Karimata Arrowheads" Then $smith2 = 200
		If $smith = "79-83 Darksteel Nodowa" Then $smith2 = 200
		If $smith = "83-87 Dark Adaman Sheet" Then $smith2 = 100
		If $smith = "87-92 Molybdenum Sheet" Then $smith2 = 100
		;Alchemy
		If $alch = "Alchemy" Then $alch2 = 0
		If $alch = "0-3 Antidote" Then $alch2 = 300
		If $alch = "3-8 Silencing Potion" Then $alch2 = 200
		If $alch = "5-10 Deodorizer" Then $alch2 = 300
		If $alch = "10-16 Mercury" Then $alch2 = 4000
		If $alch = "14-20 Echo Drops" Then $alch2 = 300
		If $alch = "20-25 R. Glass Fiber Rod" Then $alch2 = 101
		If $alch = "25-28 Blinding Potion" Then $alch2 = 200
		If $alch = "28-30 Eye Drops" Then $alch2 = 300
		If $alch = "28-31 Minnow" Then $alch2 = 200
		If $alch = "28-34 ArtCaseicial Lens" Then $alch2 = 2000
		If $alch = "34-40 Potion" Then $alch2 = 300
		If $alch = "40-43 Vitriol" Then $alch2 = 2000
		If $alch = "43-51 Holy Water " Then $alch2 = 100
		If $alch = "45-49 R. Carbon Fiber Rod" Then $alch2 = 101
		If $alch = "51-56 Cermet Chunk" Then $alch2 = 4000
		If $alch = "53-61 Glass Fiber" Then $alch2 = 8000
		If $alch = "61-65 R. Single-Hook Fishing Rod" Then $alch2 = 101
		If $alch = "65-71 Paralysis Dust" Then $alch2 = 2000
		If $alch = "71-78 Paralyze Potion" Then $alch2 = 200
		If $alch = "78-85 R. Composite Fishing Rod" Then $alch2 = 101
		;Leathercraft
		If $leather = "Leathercraft" Then $leather2 = 0
		If $leather = "0-2 Sheep leather" Then $leather2 = 301
		If $leather = "0-4 Sheep Wool" Then $leather2 = 202
		If $leather = "4-11 Solea" Then $leather2 = 2000
		If $leather = "11-14 Lizard Mantle" Then $leather2 = 300
		If $leather = "14-21 Dhalmel Leather" Then $leather2 = 301
		If $leather = "21-27 Dhalmel Mantle" Then $leather2 = 201
		If $leather = "27-29 Sandals" Then $leather2 = 200
		If $leather = "29-31 Parchment" Then $leather2 = 200
		If $leather = "31-35 Ram Leather" Then $leather2 = 301
		If $leather = "35-43 Waistbelt" Then $leather2 = 3020
		If $leather = "43-49 Ram Mantles" Then $leather2 = 201
		If $leather = "49-52 Himantes" Then $leather2 = 201
		If $leather = "52-59 Moccasins" Then $leather2 = 300
		If $leather = "59-61 Tiger Leather" Then $leather2 = 301
		;Clothcraft
		If $cloth = "Clothcraft" Then $cloth2 = 0
		If $cloth = "0-1 Grass Thread" Then $cloth2 = 101
		If $cloth = "1-4 Grass Cloth" Then $cloth2 = 3000
		If $cloth = "4-11 Cotton Thread" Then $cloth2 = 2000
		If $cloth = "11-12 Cotton Cloth" Then $cloth2 = 3000
		If $cloth = "12-19 Linen Thread" Then $cloth2 = 2000
		If $cloth = "19-22 Linen Cloth" Then $cloth2 = 3000
		If $cloth = "22-30 Fly Lure" Then $cloth2 = 300
		If $cloth = "30-35 Wool Thread" Then $cloth2 = 2000
		If $cloth = "35-37 Wool Cloth" Then $cloth2 = 3000
		If $cloth = "35-42 Bird Fletchings" Then $cloth2 = 2000
		If $cloth = "42-45 Velvet Cloth" Then $cloth2 = 3020
		If $cloth = "45-52 Insect Fletchings" Then $cloth2 = 2000
		If $cloth = "52-53 Silk Cloth" Then $cloth2 = 3000
		If $cloth = "53-62 Green Ribbons" Then $cloth2 = 100
		If $cloth = "62-69 Silk Headbands" Then $cloth2 = 200
		If $cloth = "69-78 Rainbow Thread" Then $cloth2 = 2000
		If $cloth = "78-81 Rainbow Cloth" Then $cloth2 = 3000
		; Times
		If $times = "11 Times" Then
			$times2 = 11
		EndIf
		If $times = "10 Times" Then
			$times2 = 10
		EndIf
		If $times = "9 Times" Then
			$times2 = 9
		EndIf
		If $times = "8 Times" Then
			$times2 = 8
		EndIf
		If $times = "7 Times" Then
			$times2 = 7
		EndIf
		If $times = "6 Times" Then
			$times2 = 6
		EndIf
		If $times = "5 Times" Then
			$times2 = 5
		EndIf
		If $times = "4 Times" Then
			$times2 = 4
		EndIf
		If $times = "3 Times" Then
			$times2 = 3
		EndIf
		If $times = "2 Times" Then
			$times2 = 2
		EndIf
		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		; Totals and Activation
		;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		$combot = $cook2 + $wood2 + $gold2 + $leather2 + $bone2 + $smith2 + $alch2 + $cloth2
		Call('synth' & $combot)
		If @error Then ContinueLoop
	EndIf
	If $msg = $n2 Then
		Exit
	EndIf
Until $msg = $GUI_EVENT_CLOSE
;
;
Func synth100()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 100
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 100", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth100
;
;
Func synth101()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 101
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 101", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{RIGHT 4}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth101
;
;
Func synth200()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 200
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 200", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT 3}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth200
;
;
Func synth201()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 201
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 201", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT 3}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth201
;
;
Func synth202()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 202
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 202", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT 3}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth202
;
;
Func synth300()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 300
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 300", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT 2}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth300
;
;
Func synth301()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 301
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 301", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{RIGHT 2}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth301
;
;
Func synth400()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 400
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 400", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5); SendKeyDelay to default.
	Exit
EndFunc ;==>synth400
;
;
Func synth500()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 500
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 500", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER 2}{RIGHT 4}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth500
;
;
Func synth501()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 501
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 501", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER}{RIGHT 4}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth501
;
;
Func synth600()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 600
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 600", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT 3}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth600
;
;
Func synth700()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 700
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 700", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT 2}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth700
;
;
Func synth701()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 701
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 701", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT 2}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth701
;
;
Func synth800()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 800
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 800", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{DOWN}{LEFT 3}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{ENTER}{DOWN}{ENTER 2}{RIGHT}{UP}{ENTER}')
		;Synthesis
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth800
;
;
Func synth2000()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 2000
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 2000", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{UP}{ENTER}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth2000
;
;
Func synth3000()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 3000
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 3000", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(500)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{UP 2}{ENTER}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth3000
;
;
Func synth3020()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 3020
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 3020", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 3}{DOWN}{ENTER}{UP}{ENTER}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth3020
;
;
Func synth4000()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 4000
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 4000", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{UP 3}{ENTER}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth4000
;
;
Func synth4020()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 4020
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 4020", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To $times2
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER 3}{DOWN}{ENTER 3}{DOWN}{ENTER}{UP}{ENTER}{RIGHT 4}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth4020
;
;
Func synth4040()
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	; 4040
	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	$answer = MsgBox(1, "Synthesis Version 4040", "This will run XCraft " & $times & @CRLF & "You will have 30 seconds to prepare" & @CRLF & "SORT your Inventory BEFORE Hitting OK")
	If $answer = 2 Then
		Exit
		Return
	EndIf
	GUISetState(@SW_HIDE, $XCraft)
	Sleep(30000)
	Opt('SendKeyDelay', 1000)
	For $loop = 1 To 6
		WinActivate("FFXiAPP-Windower Enabled")
		Sleep(1000)
		Send('{ESCAPE 4}{CTRLDOWN}i{CTRLUP}{LEFT 5}{ENTER 3}{DOWN}{ENTER}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT}{ENTER}{DOWN}{ENTER}{RIGHT}{ENTER}')
		Sleep(32000)
	Next
	; Finished!
	MsgBox(0, "Exit", "Finished!")
	Opt('SendKeyDelay', 5)
	Exit
EndFunc ;==>synth4040

